home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / source / tifreadr.sit / Tiff Window DEMO / add scroll bars.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-01-31  |  1.1 KB  |  35 lines  |  [TEXT/KAHL]
  1. #include "my color.h"
  2.  
  3. add_scroll_bars(aWindow)
  4. CWindowPtr    aWindow;
  5. {
  6. Rect            control_bounds;
  7. ControlHandle    new_scroll_bar;
  8. short            max_value, min_value, initial_value;
  9.  
  10.     max_value = 1000;
  11.     min_value = 0;
  12.     initial_value = 0;
  13.     control_bounds.top = aWindow->portRect.top - ONE_PIXEL;
  14.     control_bounds.left = aWindow->portRect.right - BAR_WIDTH + ONE_PIXEL;
  15.     control_bounds.bottom = aWindow->portRect.bottom - BAR_WIDTH + ONE_PIXEL;
  16.     control_bounds.right = aWindow->portRect.right + ONE_PIXEL;
  17.     
  18.     new_scroll_bar = NewControl(aWindow, &control_bounds, "\p", TRUE,
  19.                                 initial_value, min_value, max_value, 
  20.                                 scrollBarProc, (long)VERTICLE_SCROLL);
  21.  
  22.  
  23.  
  24.     control_bounds.top = aWindow->portRect.bottom - BAR_WIDTH + ONE_PIXEL;
  25.     control_bounds.left = aWindow->portRect.left - ONE_PIXEL;
  26.     control_bounds.bottom = aWindow->portRect.bottom + ONE_PIXEL;
  27.     control_bounds.right = aWindow->portRect.right - BAR_WIDTH + ONE_PIXEL;
  28.     
  29.     new_scroll_bar = NewControl(aWindow, &control_bounds, "\p", TRUE,
  30.                                 initial_value, min_value, max_value, 
  31.                                 scrollBarProc, (long)HORIZONTAL_SCROLL);
  32.  
  33. }
  34.  
  35.